home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 08 System Utilities / UN-FOR.BIN (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  384b  |  8 lines
  1. 10 FORA=1TO10:READB:A$=A$+CHR$(B):NEXT:FORA=1TO14:A$=A$+CHR$(160):NEXT
  2. 20 DATA0,3,21,18,4,130,17,0,90,90
  3. 30 OPEN1,8,15:OPEN2,8,2,"#0"
  4. 40 PRINT#1,"U1 2 0 18 1"
  5. 50 PRINT#1,"M-W"A$
  6. 60 PRINT#1,"U2 2 0 18 1"
  7. 70 CLOSE2:CLOSE1
  8.